home *** CD-ROM | disk | FTP | other *** search
/ The Games Machine 76 / XENIATGM66.iso / Indiana Jones / Indiana Jones.exe / RESOURCE / PREVIEW.GOB / cog_lag_grid2.cog < prev    next >
Text File  |  1999-11-15  |  10KB  |  321 lines
  1. # Jones 3D Cog Script
  2. #
  3. # BAB_Courtyard_Grid_1.cog
  4. # 
  5. # A waypoint grid for the sharks in LAG, designed to keep sharks 'patrolling' in desired areas
  6. # As well as monitoring the shark population and adding a new shark if necessary.
  7. #
  8. # [JM]
  9. #
  10. # (C) 1999 LucasArts Entertainment Company LLC. All Rights Reserved
  11. #
  12. # ========================================================================================
  13.  
  14. symbols                                     
  15.  
  16. message     startup
  17. message     killed
  18. message     entered
  19. message     arrived
  20.  
  21. # ============================== SUBROUTINES ==============================
  22.  
  23. flex        LinkWpnts           local
  24.  
  25.  
  26. # ========================================================================================
  27. #  GHOST OBJECTS - THE GRID
  28.  
  29. thing       wpnt00
  30. thing       wpnt01
  31. thing       wpnt02
  32. thing       wpnt03
  33. thing       wpnt04
  34. thing       wpnt05
  35. thing       wpnt06
  36. thing       wpnt07
  37. thing       wpnt08
  38. thing       wpnt09
  39. thing       wpnt10
  40. thing       wpnt11
  41. thing       wpnt12
  42. thing       wpnt13
  43. thing       wpnt14
  44. thing       wpnt15
  45. thing       wpnt16
  46. thing       wpnt17
  47. thing       wpnt18
  48. thing       wpnt19
  49. thing       wpnt20
  50. thing       wpnt21
  51. thing       wpnt22
  52. thing       wpnt23
  53. thing       wpnt24
  54. thing       wpnt25
  55. thing       wpnt26
  56. thing       wpnt27
  57. thing       wpnt28
  58. thing       wpnt29
  59. thing       wpnt30
  60. thing       wpnt31
  61. thing       wpnt32
  62. thing       wpnt33
  63. thing       wpnt34
  64. thing       wpnt35
  65. thing       wpnt36
  66.  
  67. #  SHARKS - and anything else that might need to use the grid
  68.  
  69. thing       Shark00                     LinkID=1
  70. thing       Shark01                     LinkID=1
  71. thing       Shark02                     LinkID=1
  72. thing       Shark03                     LinkID=2
  73. thing       Shark04                     LinkID=2    
  74. thing       Shark05                     #LinkID=0    The Shark inside the Bronze Door room
  75.  
  76.  
  77. #  TRIGGERS - To put one extra shark in if others have been killed...
  78. sector     SectorTrigger00              LinkID=3
  79. sector     SectorTrigger01              LinkID=3
  80. sector     SectorTrigger02              LinkId=3
  81. sector     SectorTrigger03              LinkID=3
  82. sector     SectorTrigger04              LinkID=3
  83. sector     SectorTrigger05              LinkID=3
  84. sector     SectorTrigger06              LinkID=3
  85. sector     SectorTrigger07              LinkID=3
  86.  
  87. #thing       BronzeDoor1
  88. #thing       BronzeDoor2
  89.  
  90. thing       GhostSharkOuter             #For the placement of new sharks
  91. thing       GhostSharkInner                          
  92.  
  93. #thing       BronzeDoorOne
  94. #thing       BronzeDoortwo
  95.  
  96.  
  97. #  LOCAL VARIABLES
  98.  
  99. template    SharkTPL=shark              local
  100.  
  101. thing       NewSharkOuter0=-1           local
  102. thing       NewSharkOuter1=-1           local
  103. thing       NewSharkInner0=-1           local
  104. thing       NewSharkInner1=-1           local
  105.  
  106. int         InnerPopulation=3           local       # Many variables (probably too many) for managing the inner and outer shark populations...
  107. int         OuterPopulation=2           local
  108. int         MinPopulation=2             local
  109.  
  110. int         NumberOfWpnts=37            local
  111. int         NumberOfSharks=6            local       # Initial number of sharks in the world
  112.  
  113. int         Check0=0                    local
  114. int         Check1=0                    local
  115.  
  116. int         GenCounter                  local
  117.  
  118. end
  119. # ========================================================================================
  120. # ========================================================================================
  121.  
  122. code
  123. # ========================================================================================
  124.  
  125. startup:
  126.     
  127.     #  ASSIGNMENT OF GHOST OBJECTS TO WAYPOINT SLOTS        
  128.     
  129.     for(GenCounter = 0; GenCounter < NumberOfWpnts; GenCounter = GenCounter + 1)
  130.     {
  131.         AISetWpnt(wpnt00[GenCounter], GenCounter);
  132.     }
  133.     
  134.     #  LINK WAYPOINTS
  135.     
  136.     AIConnectWpnts(0, 1);
  137.     AIConnectWpnts(0, 3);
  138.     AIConnectWpnts(0, 2);
  139.     AIConnectWpnts(1, 6);
  140.     AIConnectWpnts(1, 2);
  141.     AIConnectWpnts(2, 6);
  142.     AIConnectWpnts(2, 4);
  143.     AIConnectWpnts(2, 5);
  144.     AIConnectWpnts(3, 4);
  145.     AIConnectWpnts(4, 5);
  146.     
  147.     AIConnectWpnts(4, 12);
  148.     
  149.     AIConnectWpnts(5, 6);
  150.     
  151.     AIConnectWpnts(7, 8);
  152.     AIConnectWpnts(8, 9);
  153.     AIConnectWpnts(8, 10);
  154.     AIConnectWpnts(9, 10);
  155.     AIConnectWpnts(9, 11);
  156.     AIConnectWpnts(10, 11);
  157.     
  158.     AIConnectWpnts(13, 14);
  159.     AIConnectWpnts(13, 15);
  160.     AIConnectWpnts(14, 16);
  161.     AIConnectWpnts(14, 17);
  162.     AIConnectWpnts(15, 16);
  163.     AIConnectWpnts(15, 17);
  164.     
  165.     AIConnectWpnts(18, 19);
  166.     AIConnectWpnts(18, 21);
  167.     AIConnectWpnts(19, 20);
  168.     AIConnectWpnts(19, 23);
  169.     AIConnectWpnts(20, 21);
  170.     AIConnectWpnts(21, 22);
  171.     AIConnectWpnts(22, 23);
  172.     
  173.     AIConnectWpnts(24, 25);
  174.     AIConnectWpnts(24, 26);
  175.     AIConnectWpnts(24, 27);
  176.     AIConnectWpnts(25, 29);
  177.     AIConnectWpnts(26, 27);
  178.     AIConnectWpnts(26, 28);
  179.     AIConnectWpnts(27, 29);
  180.     AIConnectWpnts(27, 28);
  181.     AIConnectWpnts(28, 29);
  182.    
  183.     AIConnectWpnts(31, 32);
  184.     AIConnectWpnts(31, 33);
  185.     AIConnectWpnts(31, 34);
  186.     AIConnectWpnts(32, 33);
  187.     AIConnectWpnts(33, 35);
  188.     AIConnectWpnts(34, 35);
  189.     
  190.     for(GenCounter = 0; GenCounter < NumberOfSharks; GenCounter = GenCounter + 1)
  191.     {
  192.         #  Set instincts for the sharks and let them roam
  193.         AISetInstinctWpntMode(Shark00[GenCounter]);
  194.         AIEnableInstinct(Shark00[GenCounter], "roam", 1);
  195.     }
  196.   
  197.     return;
  198.     
  199. # ========================================================================================
  200. killed:
  201.     
  202.     #  Keep track of dead sharks
  203.     if(GetSenderID() == 1)
  204.     { 
  205.         
  206.         InnerPopulation = InnerPopulation - 1;
  207.         
  208.         if(Check0 == 0);
  209.         {
  210.             Check0 = 1;
  211.             
  212.             AIConnectWpnts(17, 18);            
  213.             AIConnectWpnts(23, 24);
  214.             
  215.         }
  216.         return;
  217.     }
  218.     
  219.     if(GetSenderID() == 2)
  220.     {
  221.         OuterPopulation = OuterPopulation - 1;
  222.        
  223.         if(Check1 == 0)
  224.         {
  225.             Check1 = 1;
  226.             
  227.             AIConnectWpnts(5, 7);
  228.             AIConnectWpnts(5, 8);
  229.             AIConnectWpnts(5, 9);
  230.             AICOnnectWpnts(6, 7);
  231.         }
  232.         return;
  233.     }
  234.  
  235.     for(GenCounter = 0; GenCounter < 1; GenCounter = GenCounter + 1)
  236.     {
  237.         if(GetSenderRef() == NewSharkInner0[GenCounter])
  238.         {
  239.             NewSharkInner0[GenCounter] = -1;
  240.             InnerPopulation = InnerPopulation - 1;
  241.         }
  242.         else if(GetSenderRef() == NewSharkOuter0[GenCounter])
  243.         {  
  244.                 NewSharkOuter0[GenCounter] = -1;
  245.                 OuterPopulation = OuterPopulation - 1;
  246.         }
  247.         
  248.     }
  249.    
  250.     return;
  251.  
  252. # ========================================================================================
  253. entered:
  254.     #  Check for low shark population where Indy can't see any sharks being generated
  255.     #  This is the sloppy maddness for making sure that there are always 2 sharks in the inner lagoon area, as well as the outer area
  256.     if(GetSenderID() == 3)
  257.     {
  258.         if(OuterPopulation < MinPopulation)
  259.         {
  260.             for(GenCounter = 0; GenCounter < 2; GenCounter = GenCounter + 1)
  261.             {
  262.             
  263.                 if(NewSharkOuter0[GenCounter] == -1)    #Create a shark in the outer lagoon
  264.                 {   
  265.                     NewSharkOuter0[GenCounter] = CreateThing(SharkTPL, GhostSharkOuter);
  266.                     CaptureThing(NewSharkOuter0[GenCounter]);
  267.              
  268.                     AISetInstinctWpntMode(NewSharkOuter0[GenCounter]);
  269.                     AIEnableInstinct(NewSharkOuter0[GenCounter], "roam", 1);
  270.                   
  271.                     OuterPopulation = OuterPopulation + 1;
  272.                     
  273.                     return;
  274.                  }
  275.             }
  276.         }
  277.         
  278.         if(InnerPopulation < MinPopulation)
  279.         {
  280.             for(GenCounter = 0; GenCounter < 2; GenCounter = GenCounter + 1) 
  281.             {
  282.                 if(NewSharkInner0[GenCounter] == -1)        #Create a shark in the inner lagoon
  283.                 {
  284.                     NewSharkInner0[GenCounter] = CreateThing(SharkTPL, GhostSharkInner);
  285.                     CaptureThing(NewSharkInner0[GenCounter]);
  286.                 
  287.                     AISetInstinctWpntMode(NewSharkInner0[GenCounter]);
  288.                     AIEnableInstinct(NewSharkInner0[GenCounter], "roam", 1);
  289.                     
  290.                     InnerPopulation = InnerPopulation + 1;
  291.                     
  292.                     return;
  293.                 }
  294.             }
  295.         }
  296.     }
  297.     
  298.     return;
  299.     
  300. # ========================================================================================
  301. // arrived:
  302.  
  303. //    if(GetSenderRef() == BronzeDoorOne)
  304. //    {   
  305. //        AIConnectWpnts(29, 30);     #These three connections are not accessible until certain 'doors' have been opened, the sharks should just turn around
  306. //        AIConnectWpnts(30, 31);
  307. //    }
  308.     
  309. //    else if(GetSenderRef() == BronzeDoorTwo)
  310. //    {
  311. //        AIConnectWpnts(35, 36);
  312. //    }        
  313.         
  314.                 
  315.  
  316. //    return;
  317.  
  318. # ========================================================================================
  319.  
  320. end   
  321.